home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / PowerMacOberon 1.2 / System / KeplerGraphs.Sym < prev    next >
Encoding:
Text File  |  1994-09-15  |  2.3 KB  |  8 lines  |  [TEXT/.Ob4]
  1. ˜Üõ¬∂KeplerGraphs |ObjectDesc
  2. Object¸{selfÇ„„‡KeplerPortsPort˚{P Draw
  3. ¸{selfıñ≥Filesreseof tRider˚{R Read
  4. ¸{self˚{R WritenofptsStar
  5. pConstellationnext tConsDesc
  6. ¸{self˚{R Read
  7. ¸{selfState
  8. ¸{self˚{R     WriteGraphconsstars seltime
  9. ¸{op˚{G˙{O˘{P     Notifiernotify p
  10. GraphDesc
  11. ¸{G˚{op  All
  12. ¸{G˚{o  Append
  13. ¸{G˚{from˙{dx˘{dy 
  14. CopySelection
  15. ¸{G˚{o Delete
  16. ¸{G˚{minstate DeleteSelection
  17. ¸{G˚{P Draw
  18. ¸{G˚{p FlipSelection
  19. ¸{G˚{s˙{dx˘{dy     Move
  20. ¸{G˚{dx˙{dy 
  21. MoveSelection
  22. ¸{G˚{R Read
  23. ¸{G˚{o  SendToBack
  24. ¸{G˚{R Write
  25. ¸{G˚{R  WriteSelPlanetxyrefcntsel next xStarDesc
  26. ¸{self˚{P Draw
  27. ¸{self˚{R Read
  28. ¸{self˚{R Writec lPlanetDesc
  29. ¸{self Calc
  30. ¸{self˚{P Draw
  31. ¸{self˚{R Read
  32. ¸{self˚{R Write
  33. ¸{o ˚{module˘{type
  34. GetType
  35. ¸{nameOld
  36. ¸{R˙{x ReadObj
  37.  Recall
  38.  Reset
  39. ¸{R˙{x  WriteObjdrawloadingrestoreܵàflDisplay Frame dsc nextX
  40. Y WH
  41.  ¸{f x!!FrameMsg!˚{msg     "Handler"handle t##FrameDescx0y0scale ext #$|$$ $PortDesc
  42. ¸{P˚{x$CX
  43. ¸{P˚{y$CY
  44. ¸{P˚{X$Cx
  45. ¸{P˚{Y$Cy
  46. ¸{P˚{x˙{y˘{r¯{col˜{mode $DrawCircle
  47. ¸{P˚{x˙{y˘{a¯{b˜{colˆ{mode $DrawEllipse
  48. ¸{P˚{x1˙{y1˘{x2¯{y2˜{colˆ{mode $DrawLine
  49. ¸{P˚{x˙{y˘{w¯{h˜{colˆ{mode $DrawRect
  50. ¸{P˚{x˙{y %˘{sêØâflFonts&Font&˜{fontˆ{colı{mode $    DrawString
  51. ¸{P˚{x˙{y˘{r¯{col˜{patˆ{mode $    
  52. FillCircle
  53. ¸{P˚{x1˙{y1˘{x2¯{y2˜{x3ˆ{y3ı{x48y4<col¿patƒmode $
  54. FillQuad
  55. ¸{P˚{x˙{y˘{w¯{h˜{colˆ{patı{mode $ FillRect$ #
  56.  'Name'name height"minX$maxX&minY(maxY(Font(,raster0 4|))FontDesc&) |**Bytes(*